﻿
Public Class EntityBase
    Property Id As Integer
    Property Nombre As String
    Property Descripcion As String

    Sub New()
        Id = 0
        Nombre = String.Empty
        Descripcion = String.Empty
    End Sub

    Overridable Function IsEmpty() As Boolean
        Dim empty As Boolean = False

        If Id = 0 And String.IsNullOrEmpty(Nombre) And String.IsNullOrEmpty(Descripcion) Then
            empty = True
        End If

        Return empty
    End Function

End Class
